home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 2 / Amiga Tools 2.iso / tools / mg / rexx / append.mg next >
Text File  |  1995-03-09  |  296b  |  12 lines
  1. /* Append a buffer to a file. Note! This only works with WShell. */
  2. options results
  3.  
  4. 'rexx-request "Append to file: "'
  5. if rc~=0 then exit
  6. filename=result
  7.     
  8. tmpname='T:'||time(s)||pragma(id)
  9. 'write-file "'||tmpname||'"'
  10. address command 'type >>'||filename tmpname
  11. address command 'delete' tmpname
  12.